随机产生10个属于[0—100]的自然数,并保存在数组a中,然后在窗体上显示,10个数的平均值
来源:百度知道 编辑:UC知道 时间:2024/09/20 19:33:24
Private Sub Command1_Click()
Dim a(10) As Variant
For i = 0 To 9
Randomize
a(i) = Int((100 - 0 + 1) * Rnd + 0)
Next
Dim s As Variant
s = 0
For k = 0 To 9
s = s + a(k)
Next
Print s / 10
End Sub
听不清楚啊..
随机产生10个属于[0—100]的自然数,并保存在数组a中,然后在窗体上显示,10个数的平均值
VB 中怎么用随机函数产生50个10—100之间的互不相同的整数
vb 随机产生10个[10~100]之间整数,按升序输出到label1控件中
从1到100间随机产生不同的10个整数怎么做?谢谢
随机产生10个数字 放到textbox里 vb代码
C++随机产生10个互不相同两位整数
利用随机函数产生100个10~99之间的随机整数,找出其中的素数,并将这些素数求和。
关于VB:随机产生10个 递增的 100到400的随机数,存放到数组中,并显示结果。
怎样用VB做随机产生10个1-100以内的整型数,求出其的最大值,最小值,平均值
pascal语言中想随机产生10个(50,100)的数该怎么用random函数